home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Power Programmierung
/
Power-Programmierung (Tewi)(1994).iso
/
magazine
/
msysjour
/
vol04
/
02b
/
project
/
projseal.lod
< prev
next >
Wrap
Text File
|
1988-11-22
|
2KB
|
63 lines
/* ProjSeal.lod --load the Project manager files and "seal"
the application into a standalone application.
To seal off, load this file on top of SMALL.IMA by typing
load("projseal.lod");
load();
This will load all of the classes for the project manager application.
If you don't have Language Extensions, delete the first five files
below. You will not be able to use the fileSave and fileOpen methods
for ProjWindow, but, everything else should work fine.
*/
Actor[#ProjWindow] := nil; /* avoid "undefined" dialog box */
!!
LoadFiles := tuple(
"classes\orderedd.cls", /* From Language Extensions I */
"act\literals.act" , /* Object storage facility */
"classes\structou.cls" ,
"classes\storedob.cls" ,
"act\objstore.act",
"act\printer.act", /* Mark Solinski's printer stuff */
"classes\printer.cls",
"classes\textprin.cls",
"classes\date.cls", /* Adam Rauch's Date stuff */
"act\date.act",
"proj.h", /* constants */
"act\proj.act", /* misc. methods */
"classes\ActivDia.cls", /* dialog classes */
"classes\MStoneDi.cls",
"classes\TaskDial.cls",
"classes\PERTDial.cls",
"classes\PWSetDia.cls",
"classes\ProjDial.cls",
"classes\resdialo.cls",
"classes\filedial.cls",
"classes\Node.cls", /* other project classes */
"classes\Activity.cls",
"classes\Mileston.cls",
"classes\Task.cls",
"classes\PERTTask.cls",
"classes\resource.cls",
"classes\Network.cls",
"classes\Project.cls",
"classes\Ganttwin.cls", /* window classes */
"classes\ProjWind.cls",
"act\install.act", /* seal off files */
"act\projapp.act",
"act\opt.act", /* minimal image */
{abort(Object.methods[#installProj])} /* do it! */
);
!!